0 POKE53280,1:POKE53281,1:POKE646,12:PRINT"[147]"
1 IFPEEK(826)=.THENPOKE826,1:LOAD"KKW.COLOUR",8,1
2 POKE646,15:B=1024:C=B+1000:D=16384-1024:POKE53280,0:POKE53281,0:PRINT"[147]"
3 POKE53265,32:POKE53272,24:POKE53270,216:FORI=BTOC:POKEI,PEEK(D+I):NEXT
4 POKE53265,59
5 POKE198,0:WAIT198,1:PRINT"[147]":POKE53265,27:POKE53272,21:POKE53270,200
9 POKE53280,1:POKE53281,1:POKE646,12
10 PRINT"[147]	       [196]AS HAETT' ICH NIE GEDACHT!"
20 PRINT"[196]IE [211]TORY:"
30 PRINT"[196]U LEBST IM [202]AHR 2007. [200]EUTE IST DER 6.";
40 PRINT"[205]AERZ. [196]ER  [195]OMPUTER-[214]IRUS  [205]ICHELANGLO";
50 PRINT"FEIERT SEINEN 532STEN  [199]EBURTSTAG.  [196]IE";
60 PRINT"[193]NTI-[214]IREN-[208]ROGRAMME   SIND  INZWISCHEN";
70 PRINT"MACHTLOS GEGEN IHN. [196]IE [205]ENSCHHEIT KANN";
80 PRINT"DAMIT JEDOCH SEIT MEHREREN [202]AHREN UMGE-";
90 PRINT"HEN. [196]ER 6.[205]AERZ WURDE ZUM [198]EIERTAG ER-";
100 PRINT"KLAERT UND DIE [195]OMPUTER AN  DIESEM  [212]AG";
101 PRINT"NICHT BENUTZT.
110 [141]10000
120 [153]"CHR$AEBE ES DA  NICHT  DIE  LENOMPUTER,  DIE";
130 [153]"NIE ABGESCHALTET  WERDEN  DUERFEN,   SO";
140 [153]"WAEREN   SAEMTLICHE   (null)ROBLEME   AUSGE-";
150 [153]"SCHLOSSEN.   PEEKEI  DEN  LENOMPUTERN,   DIE";
160 [153]"DIE   LEBENSERHALTENDEN   (null)YSTEME   DER";
170 [153]"VALRDE   AUFRECHTERHALTEN,   WURDE    EIN";
180 [153]"(null)CHREIBSCHUTZCLOSECLOSE FUER  CLOSEDIE  CLOSE (null)PEICHER-";
190 [153]"MEDIEN EINGEBAUT."
200 [153]"(null)ICHELANGELO IST JEDOCH EIN INTELLIGEN-";
210 [153]"TES (null)YSTEM UND LERNFAEHIG.
220 GOSUB10000
230 PRINT"[197]R HAT INZWISCHEN  GELERNT,  DIE  [204]ESE-";
240 PRINT"KOEPFE IN [211]CHREIBKOEPFE UMZUWANDELN UND";
250 PRINT"DIE VIELFAELTIGEN [211]ICHERHEITSSYSTEME ZU";
260 PRINT"UMGEHEN."
270 PRINT"[197]R KONNTE SICH IN MEHRERE [193]TOMKRAFTWER-";
280 PRINT"KE UND IN DEN [195]OMPUTER ZUR  [193]UFRECHTER-";
290 PRINT"HALTUNG DES  [211]ONNENSCHILDES  EINSCHREI-";
300 PRINT"BEN.":GOSUB10000
310 PRINT"[196]EINE [193]UFGABE..."
320 PRINT"...IST ES NUN, DIE BEFALLENEN  [195]OMPUTER";
330 PRINT"DURCH EINEN [195]64 ZU ERSETZEN.  [196]AZU  BE-";
340 PRINT"NOETIGST DU NATUERLICH  AUCH  DIE  ENT-";
350 PRINT"SPRECHENDE [211]OFTWARE,  DIE  DEN  [194]ETRIEB";
360 PRINT"EINES [203]ERNREAKTORS SIMULIEREN KANN."
370 GOSUB10000
380 PRINT"[196]EINE [193]USRUESTUNG..."
390 PRINT"[218]U [194]EGINN BESITZT DU  EINE  [203]ARTE,  AUF";
400 PRINT"DER DIE  BETROFFENEN  [210]EAKTOREN  EINGE-";
410 PRINT"ZEICHNET SIND,  ZWEI [195]64ER,  SIEBEN [203]O-";
420 PRINT"PIEN   EINES   [203][203][215]-[211]IMULATORS,   SIEBEN";
430 PRINT"[210][211]-232 - [211]CHNITTSTELLEN   UND   700 000";
440 PRINT"[197]URO IN BAR."
450 PRINT"[214]IEL [197]RFOLG BEI DER SCHWIERIGEN  [193]UFGA-";
460 PRINT"BE!":GOSUB10002
470 RUN
9999 END
10000 PRINT" [198]1 [146] [215]EITERLESEN /  [198]7 [146] [211]PIEL LADEN"
10001 GOTO10005
10002 PRINT" [198]1 [146] [193]NLEITUNG!! /  [198]7 [146] [211]PIEL LADEN"
10005 POKE198,0:WAIT198,1:GETA$:IFA$="[136]"THEN60000
10010 PRINT"[147]":RETURN
60000 LOAD"LDR",8